      parameter(mm=10000) !ndata
      parameter(nn=400) !ncols
      common/data/ xob_(nn,mm),xob(nn,mm),ee(mm),df2
